home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / MacApp Documentation / MacApp AppleLink Messages / MacApp.Tech$ 3⁄30⁄90 / 1017-re[2]>THINK Pascal C-Mar90 < prev    next >
Encoding:
Text File  |  1990-03-30  |  1.3 KB  |  43 lines  |  [TEXT/GEOL]
  1. Item    2600530                         30-March-90        16:23PST
  2.  
  3. From:   D3072                           Performance SW, Curt Loughin,PRT
  4.  
  5. To:     MOOF                            Rollin, Keith A
  6.  
  7. cc:     MACAPP.TECH$                    MacApp Technical
  8.  
  9. Sub:    re[2]>THINK Pascal Conversion
  10.  
  11. Keith,
  12.  
  13. > 2) THINK Pascal doesn't seem to like creating sets on the fly. I was checking
  14. > to see if a command number was in a certain set with the following command:
  15. >
  16. >     IF aCmdNumber IN [cOpenFromSelection, cOpenMultiPage, cOpenContinuing]
  17. > THEN ...
  18. >
  19. > The workaround was to turn this into 3 comparison statements.
  20.  
  21. I don't think the problem is with creating sets on the fly, but with the
  22. magnitude of the set elements. The THINK Pascal default for the range of sets
  23. is 0..255. This can be overridden via a radio button in the Compile Options...
  24. dialog to make it -32768..32767.
  25.  
  26. While we're on the subject of incompatibilities, the following was rejected by
  27. THINK ("Variables of this type would be too large"):
  28.  
  29. TYPE
  30.  BigString = RECORD
  31.    l: Integer;
  32.    c: PACKED ARRAY[1..32767] OF Char;
  33.   END;
  34.  
  35. The manual says that THINK data structures are limited to 32766 bytes max
  36. because "the MC68000 architecture doesn't allow 32 bit offsets". However, MPW
  37. Pascal handles it (it even accepts it if I change the upper bound of the
  38. subscript to 65535).
  39.  
  40. Curt Loughin
  41.  
  42.  
  43.